home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 70
/
070.d81
/
movie gram boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
31 lines
10 poke53281,.:poke53280,12:print"[147]"
20 gosub260
30 sys57812"sc font-70",8,0:poke780,0:poke781,0:poke782,48:sys65493
40 poke53272,29
50 b$=" [221][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][186][221]"
70 print" [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
80 fori=1to7:printb$:next
90 print" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
100 poke214,9:print
120 printtab(12)"[212]he[208][213][218][218][204][197][208][193][199][197]"
140 printtab(10)"[154][193][159][204][207][193][196][211][212][193][210][154][197][216][195][204][213][211][201][214][197]"
170 sys57812"windows.o-70",8,0:poke780,0:poke781,16:poke782,205:sys65493
200 print"[144]load"chr$(34)"movie gram"chr$(34)",8"
210 print"run"
220 poke43,1:poke44,64:poke16384,0
230 poke631,13:poke632,13:poke633,13:poke198,3
240 new
250 :
260 poke214,15:print
270 print" [151][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
280 print" [152] "
290 print" [205] [207] [214] [201] [197] [199] [210] [193] [205] "
300 print" [194]y [194]arbara [200]. [211]chulak (c) 1990 "
310 print" [208]ublished on [204][207][193][196][211][212][193][210] #70 "
320 print" [211]ubscriptions 1-800-831-2694 "
330 print" [193]ll [210]ights [210]eserved "
340 print" "
350 print" [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]"
360 return
10000 open15,8,15,"s0:movie gram boot":close15:save"0:movie gram boot",8:end